From 386b80ee0713d0490080744a012315df09d371fd Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 25 Jan 2009 00:54:53 +0000 Subject: [PATCH] (grep-mode-map): Put grep-find before grep and change its title from "Recursive grep..." to "Grep via Find...". Add menu items for lgrep and rgrep. --- lisp/progmodes/grep.el | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index e6447563278..b4bcc5c88a5 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el @@ -204,12 +204,18 @@ See `compilation-error-screen-columns'" (define-key map [menu-bar grep compilation-compile] '(menu-item "Compile..." compile :help "Compile the program including the current buffer. Default: run `make'")) + (define-key map [menu-bar grep compilation-rgrep] + '(menu-item "Recursive grep..." rgrep + :help "User-friendly recursive grep in directory tree")) + (define-key map [menu-bar grep compilation-lgrep] + '(menu-item "Local grep..." lgrep + :help "User-friendly grep in a directory")) + (define-key map [menu-bar grep compilation-grep-find] + '(menu-item "Grep via Find..." grep-find + :help "Run grep via find, with user-specified args")) (define-key map [menu-bar grep compilation-grep] '(menu-item "Another grep..." grep :help "Run grep, with user-specified args, and collect output in a buffer.")) - (define-key map [menu-bar grep compilation-grep-find] - '(menu-item "Recursive grep..." grep-find - :help "Run grep via find, with user-specified args")) (define-key map [menu-bar grep compilation-recompile] '(menu-item "Repeat grep" recompile :help "Run grep again")) -- 2.30.2